home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / DEV / C-H / CHexDmpDA.cpt / Hex Dump DA / pstr utilities.c < prev    next >
Text File  |  1988-05-26  |  372b  |  26 lines
  1. pstrcat(s1, s2)
  2. register char *s1, *s2;
  3. {
  4.     register char *p;
  5.     register short len, i;
  6.     
  7.     if (*s1+*s2<=255) {
  8.         p = *s1 + s1 + 1;
  9.         *s1 += (len = *s2++);
  10.     }
  11.     else {
  12.         *s1 = 255;
  13.         p = s1 + 256 - (len = *s2++);
  14.     }
  15.     for (i=len; i; --i) *p++ = *s2++;
  16. }
  17.  
  18. pstrcpy( s1, s2 )
  19. register char *s1, *s2;
  20. {
  21.     register int length;
  22.     
  23.     for (length=*s2; length>=0; --length) *s1++=*s2++;
  24. }
  25.  
  26.